+ u * * A PTOSja™ *** been written for the PDP~i providing a subset 
ol Tihe features of the LISP interpreter for the IBM ^09/7090? This 
program, which contains no kncwm bugs, w;tl3 run en any PDP-i with 
automatic divide. On machines with more than 4k of meraorv, it must 
be nan in memory field o 

It Is assumed that the reader is familiar with 70Q i-T-sp 
in genera, and with the LISP 31.5 Programmer 8 a Manual In particular* 

Input/Output 

Input cometi from the typewriter if SS 5 is up and from 
the reader otherwise • Output is normally on the typewriters how- 
ever* SS 3 up causes punching (with correct parity) and SS 6 up 
Independently suppresses typeout* 

Each 3-»expresslon typed in wiiil be evaluated and its 
value printed out* Unlike ?09 LISP* arguments of functions are 
also evaluated on the top levels thus, to evaluate 

- cons[A?B] 
it is necessary to write 

(cons (quote a) (quote b)) 

In the inputs 

Tab s space* and comma are equivalent! 

Carriage return la ignored! 

Backspace causes deletion of everything typed since 
the last control character (parenthesis^ space/tab/comma* or- 
period) 1 

An extra gipaae mu$t be typed to terminate the entire 
expression! 

Upper and lower case shifts will be noted tout not 
necessarily Inserted into the symbol at that point (for example* 
the sequence UoC, l*c«, u a c« f A, space* produces a. symbol with 
print name UoC«« A^ XoC»)? 

^ ls v^gy advisable to stick to "printout" format 
for all input since the READ routine is net guaranteed to work 
on any other form 5 although it may? 

w - tt is a letter and does not negate a following 
number 1 

All numbers are octal integers s to Input the number 
-& it is necessary to type 777776 » 

There is no limit on the length of a print name; 

The character w """ or ^j 1 * will cause the next charac- 
ter to be inserted in the print name and considered a letter, 
regardless of what it actually Is (the ®~~™ or "I" itself does 
not appear in the print name)s thus atom© may be generated for 
output formatting purposes with names such as "tab* or space « 

In the outputs 

A carriage return is automatically generated after 
any 10O( octal)' characters not containing a carriage return! 

Unlike the 709 LISP output*, no space® are provided 

bafsre and after the "«" of concatenation (since there are no 
floating point number® to worry about K 



ATOM 


CAR 


COND 


CONS 


LIST 


MINUS 


QUOTIENT 


RPIACA 


PROG 


RETURN 


SETQ. 


SASSOC 


EVAL 


QUOTE 


TERPRI 





Available Functions 

The following functions are available and identical to their 
709 counterparts * 

CDR 

GENSYM 

NUMBERP 

RPLACD 

GO 

READ 

NULL 

The following functions are -available and somewhat different 
from the corresponding 709 functionst 

EQ also works on numbers $ - 
GREATERP tests for x>y, not x>y* 
STOP is equivalent to 709TAUSE and takes a numeric 

argument which appears in the AC when the machine 

halts j 
PRINT has value NIL. 

The following function has no counterpart on the 709s 

PRINl[x] prints the atom x without the extra space at the 
endt value TisHRTC 

The following special forms are available and are the same ac 
the corresponding forms on the 709« 

LAMBDA LABEL 

The following permanent objects exist in the systems 

OBLIST the current atomic symbol list? 
ALIST the current bound variable pair-list* 



NIL 
T 

EXPR 
SUBR 
FSUBR 
AP7AL 



F has been replaced by NIL 



Operation of the System 



READ IN the binary tape. Do nothing until the machine has 
come to a halt. If it stops anywhere except at 4, pull the tape back 
a block check for missing holes, and CONTINUE When it stops at &, 
CONTINUEing begins the READ-EVAL-PRINT cycle. STARTing at h at any 
time and CONTINUEing is safet indeed, it is the only way to annull most 
typing errors. If the system "drops dead", dump as much of core between 
k and 775 1 as is possible and try STARTing at 4. If further difficul- 
ties ensue (which is likely), notify Donald Eastlake (MIT, room 26-260 , 
extension 4^67) at once and provide him with your name, the dump, and 
all pertinent typed or punched material 



Error Halts 

Error halts cause identification of the error in red on the 
typewriter, regardless of the settings of SS 3 and 6, and usually send 
the system to 4. A list follows. 



"led* 
"uss" 
•tma" 

"uas" 

"ilp w 



"Its" 
"ats w 
"see" 



"pee" 
"nna " 

"ana" 

"ovf" 



Illegal CONDt returns value NIL and continues* 
unbound symbol in SETCU returns NIL and continues. 
Too many~arguments~for a SUBR (more than 3)e ignores 
extras ana' proceeds. 

Unbound atomic symbol (followed by form currently 
Ueing e vaT.ua tedl". 

Illegal parity* halts with character in AC* CONTINUE 
Ignores character, but SS 5 may be turned up to 
provide a replacement if desired * 
LAMBDA variable list too short. 

Argument list (palred""witK IAMBDA list) too short. 
storage capacity exceeded. COMTINUEing Ts not advis- 
able, as it will probably provoke the same error again 
in short order. 
Pushdown capacity exceeded. 

Non-numerTc argument for arithmetic, followed by 
aTrgument in question* returns value zero and proceeds. 
Argument not atom (for PRINl)* returns NIL as usual 
and proceeds. 
Division overflow* returns zero and proceeds. 

Odds and Ends 



PNAMEs are not part of property lists. A quick examination of 
listings of the system will show exactly where they are. 

Qoing a CDR of an atom is quite ok and will get the atom 9 s 
oroperty list. Doing a CAR of an atom may very easily wreck the system c 

Do not forget that FEXPR does not exist. ' 

QUOTE should be used in place of FUNCTION. This may require 
a bit of extra care in defining functions with functional arguments. 

It is advisable to use PROG to avoid recursion wherever pos« 
slble, even though it may take more space. The pushdown list will permit 
recursion to about 6o(decimal) levels. If this is intolerably small, 
reassemble the system. 

The system has about 900 LISP registers of free storage and 
?50 registers of half-word space (replaces full-word space). 



Questions should be addressed first to the listings of the 
system then to Donald Eastlake, then, if all else falls, to me. 



Peter Deutsch 



-Bie following additions tave been made to PBP-i Lisp; 

I-, plus* (fsubr,, uses octal) 

2~ times (fsubr,-, uefiS octal) 

3o logand (fsubr) 

4* logcr (fsubr) 

5o texpv {works except that the second variable of 
the lambda ie not bound to the a3ist)< 



